home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / prolog / ai.prl / opnprlg1.hqx / Open Prolog / Open Prolog.rsrc / CODE_31_ancestor.txt < prev    next >
Text File  |  1993-04-15  |  26KB  |  470 lines
  1. # near model CODE resource
  2. # entry label at 0x0000
  3. export_412:
  4. entry:
  5. 00000000  4E56 FFF0                link       A6, -0x0010
  6. 00000004  4CEA 0003 0030           movem.l    D1,D0, [A2 + 0x30]
  7. 0000000A  0C80 0000 0020           cmpi.l     D0, 0x20 /* ' ' */
  8. 00000010  6600 00E4                bne        +0xE6 /* 000000F6 */
  9. 00000014  E589                     lsl        D1, 2
  10. 00000016  D2AD E8CC                add.l      D1, [A5 - 0x1734]
  11. 0000001A  2041                     movea.l    A0, D1
  12. 0000001C  2028 001C                move.l     D0, [A0 + 0x1C]
  13. 00000020  6700 00AA                beq        +0xAC /* 000000CC */
  14. 00000024  2640                     movea.l    A3, D0
  15. 00000026  3023                     move.w     D0, -[A3]
  16. 00000028  47F3 0000                lea.l      A3, [A3 + D0.w]
  17. 0000002C  2245                     movea.l    A1, D5
  18. 0000002E  22FC 0000 0044           move.l     [A1]+, 0x44 /* 'D' */
  19. 00000034  22FC 494E 464F           move.l     [A1]+, 0x494E464F /* 'INFO' */
  20. 0000003A  2013                     move.l     D0, [A3]
  21. 0000003C  0800 0000                btst.b     D0, 0x0
  22. 00000040  6600 008A                bne        +0x8C /* 000000CC */
  23. 00000044  2040                     movea.l    A0, D0
  24. 00000046  D1ED E8A8                add.l      A0, [A5 - 0x1758]
  25. 0000004A  4A28 0007                tst.b      [A0 + 0x7]
  26. 0000004E  660A                     bne        +0xC /* 0000005A */
  27. 00000050  22FC 0000 0018           move.l     [A1]+, 0x18
  28. 00000056  22D3                     move.l     [A1]+, [A3]
  29. 00000058  6050                     bra        +0x52 /* 000000AA */
  30. label0000005A:
  31. 0000005A  201B                     move.l     D0, [A3]+
  32. 0000005C  4EAD 08BA                jsr        [A5 + 0x8BA]
  33. 00000060  D0AD E8A8                add.l      D0, [A5 - 0x1758]
  34. 00000064  4299                     clr.l      [A1]+
  35. 00000066  22C0                     move.l     [A1]+, D0
  36. 00000068  2349 FFF8                move.l     [A1 - 0x8], A1
  37. 0000006C  48EE 00C0 FFF0           movem.l    [A6 - 0x10], D7,D6
  38. 00000072  2041                     movea.l    A0, D1
  39. 00000074  2428 0008                move.l     D2, [A0 + 0x8]
  40. 00000078  2042                     movea.l    A0, D2
  41. 0000007A  2028 0010                move.l     D0, [A0 + 0x10]
  42. 0000007E  48EE 0005 FFF8           movem.l    [A6 - 0x8], D2,D0
  43. label00000084:
  44. 00000084  4A53                     tst.w      [A3]
  45. 00000086  6722                     beq        +0x24 /* 000000AA */
  46. 00000088  4CEE 00C0 FFF8           movem.l    D7,D6, [A6 - 0x8]
  47. 0000008E  4EAD 0D5A                jsr        [A5 + 0xD5A]
  48. 00000092  4CEE 00C0 FFF0           movem.l    D7,D6, [A6 - 0x10]
  49. 00000098  7400                     moveq.l    D2, 0x00
  50. 0000009A  2609                     move.l     D3, A1
  51. 0000009C  22C2                     move.l     [A1]+, D2
  52. 0000009E  22C3                     move.l     [A1]+, D3
  53. 000000A0  4EAD 0D42                jsr        [A5 + 0xD42]
  54. 000000A4  6900 002C                bvs        +0x2E /* 000000D2 */
  55. 000000A8  60DA                     bra        -0x24 /* 00000084 */
  56. label000000AA:
  57. 000000AA  2045                     movea.l    A0, D5
  58. 000000AC  4CE8 000C 0008           movem.l    D3,D2, [A0 + 0x8]
  59. 000000B2  4CEA 0003 0038           movem.l    D1,D0, [A2 + 0x38]
  60. 000000B8  4EAD 0D42                jsr        [A5 + 0xD42]
  61. 000000BC  6900 0014                bvs        +0x16 /* 000000D2 */
  62. 000000C0  6500 000A                bcs        +0xC /* 000000CC */
  63. 000000C4  2A09                     move.l     D5, A1
  64. 000000C6  4E5E                     unlink     A6
  65. 000000C8  4EED 053A                jmp        [A5 + 0x53A]
  66. label000000CC:
  67. 000000CC  4E5E                     unlink     A6
  68. 000000CE  4EED 00F2                jmp        [A5 + 0xF2]
  69. label000000D2:
  70. 000000D2  4E5E                     unlink     A6
  71. 000000D4  2F3C 0000 000D           move.l     -[A7], 0xD /* '\r' */
  72. 000000DA  42A7                     clr.l      -[A7]
  73. 000000DC  42A7                     clr.l      -[A7]
  74. 000000DE  42A7                     clr.l      -[A7]
  75. 000000E0  487A 005A                pea.l      [PC + 0x5A /* 0000013C, pstring "get$frame$first$call" */]
  76. 000000E4  3F3C 0002                move.w     -[A7], 0x2
  77. 000000E8  4EAD 0D3A                jsr        [A5 + 0xD3A]
  78. 000000EC  301B                     move.w     D0, [A3]+
  79. 000000EE  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  80. 000000F2  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  81. label000000F6:
  82. 000000F6  4E5E                     unlink     A6
  83. 000000F8  2F3C 0000 000F           move.l     -[A7], 0xF
  84. 000000FE  2F3C 0000 0001           move.l     -[A7], 0x1
  85. 00000104  42A7                     clr.l      -[A7]
  86. 00000106  42A7                     clr.l      -[A7]
  87. 00000108  487A 0032                pea.l      [PC + 0x32 /* 0000013C, pstring "get$frame$first$call" */]
  88. 0000010C  3F3C 0002                move.w     -[A7], 0x2
  89. 00000110  4EAD 0D3A                jsr        [A5 + 0xD3A]
  90. 00000114  301B                     move.w     D0, [A3]+
  91. 00000116  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  92. 0000011A  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  93. 0000011E  4E5E                     unlink     A6
  94. 00000120  4E75                     rts
  95. 00000122  9742                     subx.w     D3, D2
  96. 00000124  2567 6574                move.l     [A2 + 0x6574], -[A7]
  97. 00000128  2E66                     movea.l    A7, -[A6]
  98. 0000012A  7261                     moveq.l    D1, 0x61
  99. 0000012C  6D65                     blt        +0x67 /* 00000193 */
  100. 0000012E  2E66                     movea.l    A7, -[A6]
  101. 00000130  6972                     bvs        +0x74 /* 000001A4 */
  102. 00000132  7374                     moveq.l    D1, 0x74
  103. 00000134  2E63                     movea.l    A7, -[A3]
  104. 00000136  616C                     bsr        +0x6E /* 000001A4 */
  105. 00000138  6C20                     bge        +0x22 /* 0000015A */
  106. 0000013A  0000 1467                ori.b      D0, 0x67 /* 'g' */
  107. 0000013E  6574                     bcs        +0x76 /* 000001B4 */
  108. 00000140  2466                     movea.l    A2, -[A6]
  109. 00000142  7261                     moveq.l    D1, 0x61
  110. 00000144  6D65                     blt        +0x67 /* 000001AB */
  111. 00000146  2466                     movea.l    A2, -[A6]
  112. 00000148  6972                     bvs        +0x74 /* 000001BC */
  113. 0000014A  7374                     moveq.l    D1, 0x74
  114. 0000014C  2463                     movea.l    A2, -[A3]
  115. 0000014E  616C                     bsr        +0x6E /* 000001BC */
  116. 00000150  6C00 4E56                bge        +0x4E58 /* 00004FA8 */
  117. export_413: // at 00000152 (misaligned)
  118. 00000154  FFF0                     .extension 0xFF0 // unimplemented
  119. 00000156  4CEA 0003 0030           movem.l    D1,D0, [A2 + 0x30]
  120. // begin alternate branch 0000015A-00000166
  121. label0000015A:
  122. 0000015A  0030 0C80 0000           ori.b      [A0 + D0.w], 0x80
  123. 00000160  0020 6600                ori.b      -[A0], 0x0
  124. 00000164  00DA                     ori.?      [A2]+, 0xFFFFFFFFFFFFFFFF
  125. // end alternate branch 0000015A-00000166
  126. label0000015A: // (misaligned)
  127. 0000015C  0C80 0000 0020           cmpi.l     D0, 0x20 /* ' ' */
  128. 00000162  6600 00DA                bne        +0xDC /* 0000023E */
  129. 00000166  E589                     lsl        D1, 2
  130. 00000168  D2AD E8CC                add.l      D1, [A5 - 0x1734]
  131. 0000016C  2041                     movea.l    A0, D1
  132. 0000016E  2668 0020                movea.l    A3, [A0 + 0x20]
  133. 00000172  47EB FFFC                lea.l      A3, [A3 - 0x4]
  134. 00000176  2245                     movea.l    A1, D5
  135. 00000178  22FC 0000 0044           move.l     [A1]+, 0x44 /* 'D' */
  136. 0000017E  22FC 494E 464F           move.l     [A1]+, 0x494E464F /* 'INFO' */
  137. 00000184  2013                     move.l     D0, [A3]
  138. 00000186  0800 0000                btst.b     D0, 0x0
  139. 0000018A  6600 0088                bne        +0x8A /* 00000214 */
  140. 0000018E  2040                     movea.l    A0, D0
  141. 00000190  D1ED E8A8                add.l      A0, [A5 - 0x1758]
  142. label00000193: // (misaligned)
  143. 00000194  4A28 0007                tst.b      [A0 + 0x7]
  144. 00000198  660A                     bne        +0xC /* 000001A4 */
  145. 0000019A  22FC 0000 0018           move.l     [A1]+, 0x18
  146. 000001A0  22D3                     move.l     [A1]+, [A3]
  147. 000001A2  604E                     bra        +0x50 /* 000001F2 */
  148. fn000001A4:
  149. 000001A4  201B                     move.l     D0, [A3]+
  150. 000001A6  4EAD 08BA                jsr        [A5 + 0x8BA]
  151. 000001AA  D0AD E8A8                add.l      D0, [A5 - 0x1758]
  152. label000001AB: // (misaligned)
  153. 000001AE  4299                     clr.l      [A1]+
  154. 000001B0  22C0                     move.l     [A1]+, D0
  155. 000001B2  2349 FFF8                move.l     [A1 - 0x8], A1
  156. // begin alternate branch 000001B4-000001B6
  157. label000001B4:
  158. 000001B4  FFF8                     .extension 0xFF8 // unimplemented
  159. // end alternate branch 000001B4-000001B6
  160. label000001B4: // (misaligned)
  161. 000001B6  48EE 00C0 FFF0           movem.l    [A6 - 0x10], D7,D6
  162. fn000001BC:
  163. 000001BC  2041                     movea.l    A0, D1
  164. 000001BE  2428 0008                move.l     D2, [A0 + 0x8]
  165. 000001C2  2028 0014                move.l     D0, [A0 + 0x14]
  166. 000001C6  48EE 0005 FFF8           movem.l    [A6 - 0x8], D2,D0
  167. label000001CC:
  168. 000001CC  4A53                     tst.w      [A3]
  169. 000001CE  6722                     beq        +0x24 /* 000001F2 */
  170. 000001D0  4CEE 00C0 FFF8           movem.l    D7,D6, [A6 - 0x8]
  171. 000001D6  4EAD 0D5A                jsr        [A5 + 0xD5A]
  172. 000001DA  4CEE 00C0 FFF0           movem.l    D7,D6, [A6 - 0x10]
  173. 000001E0  7400                     moveq.l    D2, 0x00
  174. 000001E2  2609                     move.l     D3, A1
  175. 000001E4  22C2                     move.l     [A1]+, D2
  176. 000001E6  22C3                     move.l     [A1]+, D3
  177. 000001E8  4EAD 0D42                jsr        [A5 + 0xD42]
  178. 000001EC  6900 002C                bvs        +0x2E /* 0000021A */
  179. 000001F0  60DA                     bra        -0x24 /* 000001CC */
  180. label000001F2:
  181. 000001F2  2045                     movea.l    A0, D5
  182. 000001F4  4CE8 000C 0008           movem.l    D3,D2, [A0 + 0x8]
  183. 000001FA  4CEA 0003 0038           movem.l    D1,D0, [A2 + 0x38]
  184. 00000200  4EAD 0D42                jsr        [A5 + 0xD42]
  185. 00000204  6900 0014                bvs        +0x16 /* 0000021A */
  186. 00000208  6500 000A                bcs        +0xC /* 00000214 */
  187. 0000020C  2A09                     move.l     D5, A1
  188. 0000020E  4E5E                     unlink     A6
  189. 00000210  4EED 053A                jmp        [A5 + 0x53A]
  190. label00000214:
  191. 00000214  4E5E                     unlink     A6
  192. 00000216  4EED 00F2                jmp        [A5 + 0xF2]
  193. label0000021A:
  194. 0000021A  4E5E                     unlink     A6
  195. 0000021C  2F3C 0000 000D           move.l     -[A7], 0xD /* '\r' */
  196. 00000222  42A7                     clr.l      -[A7]
  197. 00000224  42A7                     clr.l      -[A7]
  198. 00000226  42A7                     clr.l      -[A7]
  199. 00000228  487A 005C                pea.l      [PC + 0x5C /* 00000286, pstring "get$frame$current$call" */]
  200. 0000022C  3F3C 0002                move.w     -[A7], 0x2
  201. 00000230  4EAD 0D3A                jsr        [A5 + 0xD3A]
  202. 00000234  301B                     move.w     D0, [A3]+
  203. 00000236  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  204. 0000023A  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  205. label0000023E:
  206. 0000023E  4E5E                     unlink     A6
  207. 00000240  2F3C 0000 000F           move.l     -[A7], 0xF
  208. 00000246  2F3C 0000 0001           move.l     -[A7], 0x1
  209. 0000024C  42A7                     clr.l      -[A7]
  210. 0000024E  42A7                     clr.l      -[A7]
  211. 00000250  487A 0034                pea.l      [PC + 0x34 /* 00000286, pstring "get$frame$current$call" */]
  212. 00000254  3F3C 0002                move.w     -[A7], 0x2
  213. 00000258  4EAD 0D3A                jsr        [A5 + 0xD3A]
  214. 0000025C  301B                     move.w     D0, [A3]+
  215. 0000025E  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  216. 00000262  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  217. 00000266  4E5E                     unlink     A6
  218. 00000268  4E75                     rts
  219. 0000026A  9942                     subx.w     D4, D2
  220. 0000026C  2567 6574                move.l     [A2 + 0x6574], -[A7]
  221. 00000270  2E66                     movea.l    A7, -[A6]
  222. 00000272  7261                     moveq.l    D1, 0x61
  223. 00000274  6D65                     blt        +0x67 /* 000002DB */
  224. 00000276  2E63                     movea.l    A7, -[A3]
  225. 00000278  7572                     moveq.l    D2, 0x72
  226. 0000027A  7265                     moveq.l    D1, 0x65
  227. 0000027C  6E74                     bgt        +0x76 /* 000002F2 */
  228. 0000027E  2E63                     movea.l    A7, -[A3]
  229. 00000280  616C                     bsr        +0x6E /* 000002EE */
  230. 00000282  6C20                     bge        +0x22 /* 000002A4 */
  231. 00000284  0000 1667                ori.b      D0, 0x67 /* 'g' */
  232. 00000288  6574                     bcs        +0x76 /* 000002FE */
  233. 0000028A  2466                     movea.l    A2, -[A6]
  234. 0000028C  7261                     moveq.l    D1, 0x61
  235. 0000028E  6D65                     blt        +0x67 /* 000002F5 */
  236. 00000290  2463                     movea.l    A2, -[A3]
  237. 00000292  7572                     moveq.l    D2, 0x72
  238. 00000294  7265                     moveq.l    D1, 0x65
  239. 00000296  6E74                     bgt        +0x76 /* 0000030C */
  240. 00000298  2463                     movea.l    A2, -[A3]
  241. 0000029A  616C                     bsr        +0x6E /* 00000308 */
  242. 0000029C  6C00 4CEA                bge        +0x4CEC /* 00004F88 */
  243. export_414: // at 0000029E (misaligned)
  244. 000002A0  0003 0030                ori.b      D3, 0x30 /* '0' */
  245. label000002A4:
  246. 000002A4  0C80 0000 0020           cmpi.l     D0, 0x20 /* ' ' */
  247. 000002AA  6600 0072                bne        +0x74 /* 0000031E */
  248. 000002AE  2801                     move.l     D4, D1
  249. 000002B0  6B00 0092                bmi        +0x94 /* 00000344 */
  250. 000002B4  4CEA 0003 0038           movem.l    D1,D0, [A2 + 0x38]
  251. 000002BA  0C80 0000 0020           cmpi.l     D0, 0x20 /* ' ' */
  252. 000002C0  6600 005C                bne        +0x5E /* 0000031E */
  253. 000002C4  E589                     lsl        D1, 2
  254. 000002C6  D2AD E8CC                add.l      D1, [A5 - 0x1734]
  255. 000002CA  2041                     movea.l    A0, D1
  256. 000002CC  4A84                     tst.l      D4
  257. 000002CE  6708                     beq        +0xA /* 000002D8 */
  258. label000002D0:
  259. 000002D0  2068 0008                movea.l    A0, [A0 + 0x8]
  260. 000002D4  5384                     subq.l     D4, 1
  261. 000002D6  66F8                     bne        -0x6 /* 000002D0 */
  262. label000002D8:
  263. 000002D8  7420                     moveq.l    D2, 0x20
  264. 000002DA  2608                     move.l     D3, A0
  265. label000002DB: // (misaligned)
  266. 000002DC  96AD E8CC                sub.l      D3, [A5 - 0x1734]
  267. 000002E0  E48B                     lsr        D3, 2
  268. 000002E2  4CEA 0003 0040           movem.l    D1,D0, [A2 + 0x40]
  269. 000002E8  4EAD 0D42                jsr        [A5 + 0xD42]
  270. 000002EC  6900 000E                bvs        +0x10 /* 000002FC */
  271. // begin alternate branch 000002EE-000002F2
  272. fn000002EE:
  273. 000002EE  000E 6500                ori.b      A6, 0x0
  274. // end alternate branch 000002EE-000002F2
  275. fn000002EE: // (misaligned)
  276. 000002F0  6500 0006                bcs        +0x8 /* 000002F8 */
  277. // begin alternate branch 000002F2-000002FE
  278. label000002F2:
  279. 000002F2  0006 4EED                ori.b      D6, 0xED
  280. label000002F5: // (misaligned)
  281. 000002F6  053A 4EED                btst       [PC + 0x4EED /* 000051E5 */], D2
  282. label000002F8: // (misaligned)
  283. 000002FA  00F2 2F3C                ori.?      <<invalid full ext with I/IS == 4>>, 0xFFFFFFFFFFFFFFFF
  284. // end alternate branch 000002F2-000002FE
  285. label000002F2: // (misaligned)
  286. 000002F4  4EED 053A                jmp        [A5 + 0x53A]
  287. label000002F5: // (misaligned)
  288. label000002F8:
  289. 000002F8  4EED 00F2                jmp        [A5 + 0xF2]
  290. label000002FC:
  291. 000002FC  2F3C 0000 000D           move.l     -[A7], 0xD /* '\r' */
  292. // begin alternate branch 000002FE-00000302
  293. label000002FE:
  294. 000002FE  0000 000D                ori.b      D0, 0xD /* '\r' */
  295. // end alternate branch 000002FE-00000302
  296. label000002FE: // (misaligned)
  297. 00000302  42A7                     clr.l      -[A7]
  298. 00000304  42A7                     clr.l      -[A7]
  299. 00000306  42A7                     clr.l      -[A7]
  300. fn00000308:
  301. 00000308  487A 007C                pea.l      [PC + 0x7C /* 00000386, pstring "get$frame$ancestor" */]
  302. label0000030C:
  303. 0000030C  3F3C 0003                move.w     -[A7], 0x3
  304. 00000310  4EAD 0D3A                jsr        [A5 + 0xD3A]
  305. 00000314  301B                     move.w     D0, [A3]+
  306. 00000316  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  307. 0000031A  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  308. label0000031E:
  309. 0000031E  2F3C 0000 000F           move.l     -[A7], 0xF
  310. 00000324  2F3C 0000 0001           move.l     -[A7], 0x1
  311. 0000032A  42A7                     clr.l      -[A7]
  312. 0000032C  42A7                     clr.l      -[A7]
  313. 0000032E  487A 0056                pea.l      [PC + 0x56 /* 00000386, pstring "get$frame$ancestor" */]
  314. 00000332  3F3C 0003                move.w     -[A7], 0x3
  315. 00000336  4EAD 0D3A                jsr        [A5 + 0xD3A]
  316. 0000033A  301B                     move.w     D0, [A3]+
  317. 0000033C  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  318. 00000340  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  319. label00000344:
  320. 00000344  2F3C 0000 0014           move.l     -[A7], 0x14
  321. 0000034A  2F3C 0000 0001           move.l     -[A7], 0x1
  322. 00000350  42A7                     clr.l      -[A7]
  323. 00000352  42A7                     clr.l      -[A7]
  324. 00000354  487A 0030                pea.l      [PC + 0x30 /* 00000386, pstring "get$frame$ancestor" */]
  325. 00000358  3F3C 0003                move.w     -[A7], 0x3
  326. 0000035C  4EAD 0D3A                jsr        [A5 + 0xD3A]
  327. 00000360  301B                     move.w     D0, [A3]+
  328. 00000362  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  329. 00000366  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  330. 0000036A  4E5E                     unlink     A6
  331. 0000036C  4E75                     rts
  332. 0000036E  9542                     subx.w     D2, D2
  333. 00000370  2567 6574                move.l     [A2 + 0x6574], -[A7]
  334. 00000374  2E66                     movea.l    A7, -[A6]
  335. 00000376  7261                     moveq.l    D1, 0x61
  336. 00000378  6D65                     blt        +0x67 /* 000003DF */
  337. 0000037A  2E61                     movea.l    A7, -[A1]
  338. 0000037C  6E63                     bgt        +0x65 /* 000003E1 */
  339. 0000037E  6573                     bcs        +0x75 /* 000003F3 */
  340. 00000380  746F                     moveq.l    D2, 0x6F
  341. 00000382  7220                     moveq.l    D1, 0x20
  342. 00000384  0000 1267                ori.b      D0, 0x67 /* 'g' */
  343. 00000388  6574                     bcs        +0x76 /* 000003FE */
  344. 0000038A  2466                     movea.l    A2, -[A6]
  345. 0000038C  7261                     moveq.l    D1, 0x61
  346. 0000038E  6D65                     blt        +0x67 /* 000003F5 */
  347. 00000390  2461                     movea.l    A2, -[A1]
  348. 00000392  6E63                     bgt        +0x65 /* 000003F7 */
  349. 00000394  6573                     bcs        +0x75 /* 00000409 */
  350. 00000396  746F                     moveq.l    D2, 0x6F
  351. 00000398  7200                     moveq.l    D1, 0x00
  352. export_415:
  353. 0000039A  4CEA 0003 0030           movem.l    D1,D0, [A2 + 0x30]
  354. 000003A0  7420                     moveq.l    D2, 0x20
  355. 000003A2  2607                     move.l     D3, D7
  356. 000003A4  96AD E8CC                sub.l      D3, [A5 - 0x1734]
  357. 000003A8  E48B                     lsr        D3, 2
  358. 000003AA  4EAD 0D42                jsr        [A5 + 0xD42]
  359. 000003AE  6900 000E                bvs        +0x10 /* 000003BE */
  360. 000003B2  6500 0006                bcs        +0x8 /* 000003BA */
  361. 000003B6  4EED 053A                jmp        [A5 + 0x53A]
  362. label000003BA:
  363. 000003BA  4EED 00F2                jmp        [A5 + 0xF2]
  364. label000003BE:
  365. 000003BE  2F3C 0000 000D           move.l     -[A7], 0xD /* '\r' */
  366. 000003C4  42A7                     clr.l      -[A7]
  367. 000003C6  42A7                     clr.l      -[A7]
  368. 000003C8  42A7                     clr.l      -[A7]
  369. 000003CA  487A 0026                pea.l      [PC + 0x26 /* 000003F2, pstring "get$frame" */]
  370. 000003CE  3F3C 0001                move.w     -[A7], 0x1
  371. 000003D2  4EAD 0D3A                jsr        [A5 + 0xD3A]
  372. 000003D6  301B                     move.w     D0, [A3]+
  373. 000003D8  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  374. 000003DC  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  375. label000003DF: // (misaligned)
  376. 000003E0  4E5E                     unlink     A6
  377. label000003E1: // (misaligned)
  378. 000003E2  4E75                     rts
  379. 000003E4  8B42 2567                pack       D5, D2, 0x2567
  380. 000003E8  6574                     bcs        +0x76 /* 0000045E */
  381. 000003EA  2E66                     movea.l    A7, -[A6]
  382. 000003EC  7261                     moveq.l    D1, 0x61
  383. 000003EE  6D65                     blt        +0x67 /* 00000455 */
  384. 000003F0  0000 0967                ori.b      D0, 0x67 /* 'g' */
  385. label000003F3: // (misaligned)
  386. 000003F4  6574                     bcs        +0x76 /* 0000046A */
  387. label000003F5: // (misaligned)
  388. 000003F6  2466                     movea.l    A2, -[A6]
  389. label000003F7: // (misaligned)
  390. 000003F8  7261                     moveq.l    D1, 0x61
  391. 000003FA  6D65                     blt        +0x67 /* 00000461 */
  392. export_416:
  393. 000003FC  4CEA 0003 0030           movem.l    D1,D0, [A2 + 0x30]
  394. // begin alternate branch 000003FE-00000402
  395. label000003FE:
  396. 000003FE  0003 0030                ori.b      D3, 0x30 /* '0' */
  397. // end alternate branch 000003FE-00000402
  398. label000003FE: // (misaligned)
  399. 00000402  0C80 0000 0020           cmpi.l     D0, 0x20 /* ' ' */
  400. 00000408  6600 004E                bne        +0x50 /* 00000458 */
  401. label00000409: // (misaligned)
  402. 0000040C  2001                     move.l     D0, D1
  403. 0000040E  E588                     lsl        D0, 2
  404. 00000410  D0AD E8CC                add.l      D0, [A5 - 0x1734]
  405. 00000414  2040                     movea.l    A0, D0
  406. 00000416  2410                     move.l     D2, [A0]
  407. 00000418  B4AD E868                cmp.l      D2, [A5 - 0x1798]
  408. 0000041C  6A00 0036                bpl        +0x38 /* 00000454 */
  409. 00000420  2B42 E868                move.l     [A5 - 0x1798], D2
  410. 00000424  2242                     movea.l    A1, D2
  411. 00000426  2629 0010                move.l     D3, [A1 + 0x10]
  412. 0000042A  2269 0018                movea.l    A1, [A1 + 0x18]
  413. 0000042E  202D E864                move.l     D0, [A5 - 0x179C]
  414. 00000432  9089                     sub.l      D0, A1
  415. 00000434  671E                     beq        +0x20 /* 00000454 */
  416. 00000436  E488                     lsr        D0, 2
  417. 00000438  5380                     subq.l     D0, 1
  418. 0000043A  2049                     movea.l    A0, A1
  419. label0000043C:
  420. 0000043C  2219                     move.l     D1, [A1]+
  421. 0000043E  B282                     cmp.l      D1, D2
  422. 00000440  6A0A                     bpl        +0xC /* 0000044C */
  423. 00000442  B285                     cmp.l      D1, D5
  424. 00000444  6E04                     bgt        +0x6 /* 0000044A */
  425. 00000446  B283                     cmp.l      D1, D3
  426. 00000448  6402                     bcc        +0x4 /* 0000044C */
  427. label0000044A:
  428. 0000044A  20C1                     move.l     [A0]+, D1
  429. label0000044C:
  430. 0000044C  51C8 FFEE                dbf        D0, -0x14 /* 0000043C */
  431. 00000450  2B48 E864                move.l     [A5 - 0x179C], A0
  432. label00000454:
  433. 00000454  4EED 053A                jmp        [A5 + 0x53A]
  434. label00000455: // (misaligned)
  435. label00000458:
  436. 00000458  2F3C 0000 000F           move.l     -[A7], 0xF
  437. label0000045E:
  438. 0000045E  2F3C 0000 0001           move.l     -[A7], 0x1
  439. label00000461: // (misaligned)
  440. 00000464  42A7                     clr.l      -[A7]
  441. 00000466  42A7                     clr.l      -[A7]
  442. 00000468  487A 0030                pea.l      [PC + 0x30 /* 0000049A, pstring "system$cut$to$frame" */]
  443. // begin alternate branch 0000046A-00000470
  444. label0000046A:
  445. 0000046A  0030 3F3C 0001           ori.b      [A0 + D0.w + 0x1], 0x3C /* '<' */
  446. // end alternate branch 0000046A-00000470
  447. label0000046A: // (misaligned)
  448. 0000046C  3F3C 0001                move.w     -[A7], 0x1
  449. 00000470  4EAD 0D3A                jsr        [A5 + 0xD3A]
  450. 00000474  301B                     move.w     D0, [A3]+
  451. 00000476  3036 000C                move.w     D0, [A6 + D0.w + 0xC]
  452. 0000047A  4EF6 000C                jmp        [A6 + D0.w + 0xC]
  453. 0000047E  4E5E                     unlink     A6
  454. 00000480  4E75                     rts
  455. 00000482  9542                     subx.w     D2, D2
  456. 00000484  2573 7973 7465 6D2E 6375 742E 746F move.l     [A2 + 0x746F], [[A3 + 0x74656D2E] + 0x6375742E]
  457. 00000492  2E66                     movea.l    A7, -[A6]
  458. 00000494  7261                     moveq.l    D1, 0x61
  459. 00000496  6D65                     blt        +0x67 /* 000004FD */
  460. 00000498  0000 1373                ori.b      D0, 0x73 /* 's' */
  461. 0000049C  7973                     moveq.l    D4, 0x73
  462. 0000049E  7465                     moveq.l    D2, 0x65
  463. 000004A0  6D24                     blt        +0x26 /* 000004C6 */
  464. 000004A2  6375                     bls        +0x77 /* 00000519 */
  465. 000004A4  7424                     moveq.l    D2, 0x24
  466. 000004A6  746F                     moveq.l    D2, 0x6F
  467. 000004A8  2466                     movea.l    A2, -[A6]
  468. 000004AA  7261                     moveq.l    D1, 0x61
  469. 000004AC  6D65                     blt        +0x67 /* 00000513 */
  470.